function test(argc, argv)
	a = array.new(1000);
	print(a);
	print(a:size());
	for i=1, 1000
	do
		a:set(i, i);
	end
	print(a:get(200));
end

test(1, 2);


for fname in dir(".") do  print(fname)  end


for i=1, 10
do
	re = pcre.new("<title>(.*)</(tit)le>");
	str = "111 <title>Hello World</title> 222";
	rc = re:match(str, string.len(str));
	if (rc ~= nil) then
		print (rc)
	end

	str = "22222222222222222222222222222";
	rc = re:match(str, string.len(str));
	if (rc ~= nil) then
		print (rc)
	end
end
for i=1, 1000000
do
	local p = pcap.new("E:/aaa.pcap", "tcp or udp");
	pkt = p:read();
	while pkt ~=nil
	do
		print (pkt);
		pkt = p:read();
	end
end